object fmLogoStokMiktarAktar: TfmLogoStokMiktarAktar
  Left = 445
  Top = 186
  BorderIcons = [biSystemMenu, biMinimize]
  BorderStyle = bsSingle
  Caption = 'Stok Miktar'#305' Aktar'
  ClientHeight = 496
  ClientWidth = 624
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = True
  Position = poMainFormCenter
  Scaled = False
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Panel2: TPanel
    Left = 0
    Top = 457
    Width = 624
    Height = 39
    Align = alBottom
    BevelInner = bvRaised
    BevelOuter = bvLowered
    TabOrder = 0
    object Button1: TButton
      Left = 8
      Top = 4
      Width = 113
      Height = 33
      Caption = 'Aktar'
      TabOrder = 0
      TabStop = False
      OnClick = Button1Click
    end
  end
  object Panel1: TPanel
    Left = 0
    Top = 189
    Width = 624
    Height = 268
    Align = alClient
    TabOrder = 1
    object wwDBGrid1: TwwDBGrid
      Left = 1
      Top = 42
      Width = 282
      Height = 225
      DisableThemes = False
      Selected.Strings = (
        'INVENNO'#9'7'#9'Depo Id'#9'F'
        'CODE'#9'18'#9'Stokkodu'#9'F'
        'miktar'#9'10'#9'Miktar'#9'F')
      IniAttributes.Delimiter = ';;'
      TitleColor = clBtnFace
      FixedCols = 0
      ShowHorzScrollBar = True
      Align = alLeft
      DataSource = Unity_StokQS
      KeyOptions = []
      ReadOnly = True
      TabOrder = 0
      TitleAlignment = taLeftJustify
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -11
      TitleFont.Name = 'MS Sans Serif'
      TitleFont.Style = []
      TitleLines = 1
      TitleButtons = False
      UseTFields = False
      PaintOptions.ActiveRecordColor = clLime
    end
    object wwDBGrid3: TwwDBGrid
      Left = 283
      Top = 42
      Width = 340
      Height = 225
      DisableThemes = False
      ControlType.Strings = (
        'depokod;CustomEdit;wwDBLookupCombo1;T')
      Selected.Strings = (
        'depokod'#9'12'#9'DepoKodu'#9'T'
        'Stokkodu'#9'24'#9'Stokkodu'#9'T'
        'gstok'#9'10'#9'Toplam'#9'F')
      IniAttributes.Delimiter = ';;'
      TitleColor = clBtnFace
      FixedCols = 0
      ShowHorzScrollBar = True
      Align = alClient
      DataSource = dsPrg_Stok
      KeyOptions = []
      TabOrder = 1
      TitleAlignment = taLeftJustify
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -11
      TitleFont.Name = 'MS Sans Serif'
      TitleFont.Style = []
      TitleLines = 1
      TitleButtons = False
      UseTFields = False
      PaintOptions.ActiveRecordColor = clLime
    end
    object wwDBLookupCombo1: TwwDBLookupCombo
      Left = 304
      Top = 60
      Width = 121
      Height = 21
      DisableThemes = False
      DropDownAlignment = taLeftJustify
      Selected.Strings = (
        'DepoAdi'#9'20'#9'DepoAdi'#9#9)
      LookupTable = DepolarQ
      LookupField = 'id'
      Navigator = False
      ReadOnly = True
      TabOrder = 2
      AutoDropDown = False
      ShowButton = True
      UseTFields = False
      AllowClearKey = False
    end
    object Panel5: TPanel
      Left = 1
      Top = 1
      Width = 622
      Height = 41
      Align = alTop
      TabOrder = 3
      object Label1: TLabel
        Left = 290
        Top = 15
        Width = 46
        Height = 13
        Caption = 'Stokkodu'
      end
      object Label2: TLabel
        Left = 476
        Top = 15
        Width = 29
        Height = 13
        Caption = 'Miktar'
      end
      object edStokkodu: TwwDBEdit
        Left = 344
        Top = 11
        Width = 121
        Height = 21
        TabOrder = 0
        UnboundDataType = wwDefault
        WantReturns = False
        WordWrap = False
        OnChange = edStokkoduChange
      end
      object edMiktar: TwwDBEdit
        Left = 515
        Top = 11
        Width = 74
        Height = 21
        TabOrder = 1
        UnboundDataType = wwDefault
        WantReturns = False
        WordWrap = False
        OnExit = edMiktarExit
      end
    end
  end
  object Panel3: TPanel
    Left = 0
    Top = 0
    Width = 624
    Height = 189
    Align = alTop
    TabOrder = 2
    object wwDBGrid2: TwwDBGrid
      Left = 1
      Top = 1
      Width = 471
      Height = 187
      DisableThemes = False
      Selected.Strings = (
        'id'#9'10'#9'id'
        'DepoAdi'#9'20'#9'Depo Ad'#305#9'F'
        'Unityid'#9'10'#9'Unity Depo Id'#9'F'
        'sira'#9'10'#9'S'#305'ra'#9'F'
        'subeid'#9'10'#9#350'ube Id'#9'F'
        'tipi'#9'1'#9'Tipi'#9'F')
      IniAttributes.Delimiter = ';;'
      TitleColor = clBtnFace
      FixedCols = 0
      ShowHorzScrollBar = True
      Align = alClient
      DataSource = DepolarQS
      KeyOptions = [dgEnterToTab, dgAllowInsert]
      TabOrder = 0
      TitleAlignment = taLeftJustify
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -11
      TitleFont.Name = 'MS Sans Serif'
      TitleFont.Style = []
      TitleLines = 1
      TitleButtons = False
      UseTFields = False
    end
    object Panel4: TPanel
      Left = 472
      Top = 1
      Width = 151
      Height = 187
      Align = alRight
      BevelOuter = bvNone
      TabOrder = 1
      object btKaydet: TBitBtn
        Left = 38
        Top = 69
        Width = 91
        Height = 60
        Caption = 'Kaydet'
        TabOrder = 0
        OnClick = btKaydetClick
      end
    end
  end
  object StokTakipQ: TADOQuery
    Connection = dm.connect
    Parameters = <>
    SQL.Strings = (
      'Select * from StokTakip Where 1=2')
    Left = 542
    Top = 10
  end
  object Unity_StokQ: TADOQuery
    Connection = dm.connect
    CursorType = ctStatic
    LockType = ltReadOnly
    Parameters = <>
    SQL.Strings = (
      
        'SELECT top 1 INVENNO,S.STOCKREF,sum(S.ONHAND) as miktar,(SELECT ' +
        'CODE from LG_019_ITEMS WHERE LOGICALREF=15) CODE  FROM  LG_017_0' +
        '1_STINVTOT S'
      'WITH(NOLOCK, INDEX = I017_01_STINVTOT_I2) '
      'GROUP BY S.STOCKREF,INVENNO'
      'having INVENNO=0 and sum(S.ONHAND)<>0 '
      'ORDER BY INVENNO,STOCKREF'
      '')
    Left = 200
    Top = 296
  end
  object Unity_StokQS: TDataSource
    DataSet = Unity_StokQ
    Left = 200
    Top = 248
  end
  object DepolarQ: TADOQuery
    Connection = dm.connect
    CursorType = ctStatic
    LockType = ltBatchOptimistic
    AfterScroll = DepolarQAfterScroll
    Parameters = <>
    SQL.Strings = (
      'select  * from depolar Where Aktif=1')
    Left = 208
    Top = 120
  end
  object DepolarQS: TDataSource
    DataSet = DepolarQ
    Left = 208
    Top = 64
  end
  object BizimStokBulQ: TADOQuery
    Connection = dm.connect
    CursorType = ctStatic
    Parameters = <
      item
        Name = 'stokkodu'
        DataType = ftString
        NumericScale = 255
        Precision = 255
        Size = 25
        Value = Null
      end>
    SQL.Strings = (
      'Select stokkod from Stok where stokkodu=:stokkodu')
    Left = 331
    Top = 101
  end
  object Prg_Stok: TADOQuery
    Connection = dm.connect
    CursorType = ctStatic
    AfterScroll = Prg_StokAfterScroll
    Parameters = <
      item
        Name = 'Depokod'
        Attributes = [paSigned, paNullable]
        DataType = ftSmallint
        Precision = 5
        Size = 2
        Value = Null
      end>
    SQL.Strings = (
      
        'Select *,dbo.Getstokkodu(Stokkod) Stokkodu from StokTakip Where ' +
        'Depokod=:Depokod'
      'Order By dbo.Getstokkodu(Stokkod)')
    Left = 370
    Top = 313
  end
  object dsPrg_Stok: TDataSource
    DataSet = Prg_Stok
    Left = 372
    Top = 261
  end
end
